home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / stk-3.002 / stk-3 / STk-3.1 / Contrib / STk-wtour / lessons / message.stk < prev    next >
Encoding:
Text File  |  1994-08-24  |  151 b   |  8 lines
  1. ;; A message widget
  2.  
  3. (message '.m :text    "This is a message.  Note how the lines wrap" 
  4.             :aspect  200 
  5.          :justify "center")
  6. (pack .m)
  7.  
  8.